object FormCalc: TFormCalc
  Left = 444
  Top = 98
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = '    FinCalc'
  ClientHeight = 312
  ClientWidth = 181
  Color = clTeal
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  PixelsPerInch = 96
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  TextHeight = 16
  object Notebook1: TNotebook
    Left = 0
    Top = -5
    Width = 182
    Height = 318
    Color = clNavy
    ParentColor = False
    TabOrder = 0
    object TPage
      Left = 0
      Top = 0
      Caption = 'REingabe'
      object ZurueckButton: TSpeedButton
        Left = 59
        Top = 104
        Width = 30
        Height = 30
        Glyph.Data = {
          20020000424D2002000000000000760000002800000019000000190000000100
          0400000000009001000000000000000000000000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          7777777777777000000077777777777777777777777770000000777777777777
          7777777777777000000077777777777777777777777770000000777777777777
          7777777777777000000077777777700077777777777770000000777777770007
          7777777777777000000077777770007777777777777770000000777777000777
          7777777777777000000077777000777777777777777770000000777700077777
          7777777777777000000077700000000000000000007770000000770000000000
          0000000000777000000077700000000000000000007770000000777700077777
          7777777777777000000077777000777777777777777770000000777777000777
          7777777777777000000077777770007777777777777770000000777777770007
          7777777777777000000077777777700077777777777770000000777777777777
          7777777777777000000077777777777777777777777770000000777777777777
          7777777777777000000077777777777777777777777770000000777777777777
          7777777777777000000000000000000000000000000000000000000000000000
          00000000}
        Spacing = 0
        OnClick = ZurueckButtonClick
      end
      object VorzeichenButton: TSpeedButton
        Left = 94
        Top = 244
        Width = 30
        Height = 30
        Glyph.Data = {
          20020000424D2002000000000000760000002800000019000000190000000100
          0400000000009001000000000000000000000000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777777777
          7777777777777000000077777777777777777777777770000000777777777777
          7777777777777000000077777777777777777777777770000000777077777777
          7777777777777000000077770777777770000000000770000000777770777777
          7000000000077000000077777707777777777777777770000000777777707777
          7777777777777000000077777777077777777777777770000000777777777077
          7777777777777000000077777777770777777777777770000000777777777770
          7777777777777000000077777777777707777777777770000000777777007777
          7077777777777000000077777700777777077777777770000000777777007777
          7770777777777000000077777700777777770777777770000000770000000000
          7777707777777000000077000000000077777707777770000000777777007777
          7777777077777000000077777700777777777777077770000000777777007777
          7777777777777000000077777700777777777777777770000000777777777777
          7777777777777000000000000000000000000000000000000000000000000000
          00000000}
        OnClick = VorzeichenButtonClick
      end
      object LBDisplay: TListBox
        Left = 24
        Top = 16
        Width = 135
        Height = 76
        Color = clWhite
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ItemHeight = 16
        Items.Strings = (
          '')
        ParentFont = False
        TabOrder = 0
        OnEndDrag = LBDisplayEndDrag
        OnMouseDown = LBDisplayMouseDown
        OnMouseMove = LBDisplayMouseMove
      end
      object ClearButton: TButton
        Left = 24
        Top = 104
        Width = 30
        Height = 30
        Caption = 'C'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = ClearButtonClick
      end
      object ProzentButton: TButton
        Left = 94
        Top = 104
        Width = 30
        Height = 30
        Caption = '%'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = ProzentButtonClick
      end
      object GeteiltButton: TButton
        Left = 129
        Top = 104
        Width = 30
        Height = 30
        Caption = '/'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = Button_OperatorClick
      end
      object Eing7Button: TButton
        Left = 24
        Top = 139
        Width = 30
        Height = 30
        Caption = '7'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 4
        OnClick = ButtonZahlClick
      end
      object Eing8Button: TButton
        Left = 59
        Top = 139
        Width = 30
        Height = 30
        Caption = '8'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        OnClick = ButtonZahlClick
      end
      object Eing9Button: TButton
        Left = 94
        Top = 139
        Width = 30
        Height = 30
        Caption = '9'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 6
        OnClick = ButtonZahlClick
      end
      object MalButton: TButton
        Left = 129
        Top = 139
        Width = 30
        Height = 30
        Caption = 'x'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 7
        OnClick = Button_OperatorClick
      end
      object Eing4Button: TButton
        Left = 24
        Top = 174
        Width = 30
        Height = 30
        Caption = '4'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 8
        OnClick = ButtonZahlClick
      end
      object Eing5Button: TButton
        Left = 59
        Top = 174
        Width = 30
        Height = 30
        Caption = '5'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 9
        OnClick = ButtonZahlClick
      end
      object Eing6Button: TButton
        Left = 94
        Top = 174
        Width = 30
        Height = 30
        Caption = '6'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 10
        OnClick = ButtonZahlClick
      end
      object MinusButton: TButton
        Left = 129
        Top = 174
        Width = 30
        Height = 30
        Caption = '-'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 11
        OnClick = Button_OperatorClick
      end
      object Eing1Button: TButton
        Left = 24
        Top = 209
        Width = 30
        Height = 30
        Caption = '1'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 12
        OnClick = ButtonZahlClick
      end
      object Eing2Button: TButton
        Left = 59
        Top = 209
        Width = 30
        Height = 30
        Caption = '2'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 13
        OnClick = ButtonZahlClick
      end
      object Eing3Button: TButton
        Left = 94
        Top = 209
        Width = 30
        Height = 30
        Caption = '3'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 14
        OnClick = ButtonZahlClick
      end
      object PlusButton: TButton
        Left = 129
        Top = 209
        Width = 30
        Height = 30
        Caption = '+'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 15
        OnClick = Button_OperatorClick
      end
      object Eing0Button: TButton
        Left = 24
        Top = 244
        Width = 30
        Height = 30
        Caption = '0'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 16
        OnClick = ButtonZahlClick
      end
      object PunktButton: TButton
        Left = 59
        Top = 244
        Width = 30
        Height = 30
        Caption = '.'
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 17
        OnClick = PunktButtonClick
      end
      object ErgebnisButton: TButton
        Left = 129
        Top = 244
        Width = 30
        Height = 30
        Caption = '='
        Font.Color = clBlack
        Font.Height = -16
        Font.Name = 'Terminal'
        Font.Style = []
        ParentFont = False
        TabOrder = 18
        OnClick = ErgebnisButtonClick
      end
      object Panel1: TPanel
        Left = 24
        Top = 288
        Width = 137
        Height = 18
        Caption = 'Financial - Calculator'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
        TabOrder = 19
        OnClick = Panel1Click
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Info'
      object Label1: TLabel
        Left = 10
        Top = 16
        Width = 159
        Height = 16
        Caption = 'TFinCalcDlg Component '
        Color = clNavy
        Font.Color = clYellow
        Font.Height = -13
        Font.Name = 'System'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
      end
      object cLabel: TLabel
        Left = 5
        Top = 69
        Width = 87
        Height = 14
        Caption = 'Copyright � 1996 '
        Color = clNavy
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object aLabel: TLabel
        Left = 31
        Top = 110
        Width = 95
        Height = 14
        Caption = 'All Rights Reserved'
        Color = clNavy
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label3: TLabel
        Left = 20
        Top = 216
        Width = 145
        Height = 14
        Caption = '101360.756@compuserve.com'
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
      end
      object Label5: TLabel
        Left = 20
        Top = 232
        Width = 145
        Height = 14
        Caption = '101365.321@compuserve.com'
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
      end
      object Label2: TLabel
        Left = 23
        Top = 168
        Width = 126
        Height = 14
        Caption = 'E-Mail :   CIS 101360,756 '
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
      end
      object Label4: TLabel
        Left = 10
        Top = 40
        Width = 115
        Height = 16
        Caption = '(V1.21) for Delphi '
        Color = clNavy
        Font.Color = clYellow
        Font.Height = -13
        Font.Name = 'System'
        Font.Style = [fsBold]
        ParentColor = False
        ParentFont = False
      end
      object Label6: TLabel
        Left = 5
        Top = 85
        Width = 167
        Height = 14
        Caption = 'by A.Haeber && S.Unterbarnscheidt'
        Color = clNavy
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Arial'
        Font.Style = []
        ParentColor = False
        ParentFont = False
      end
      object Label7: TLabel
        Left = 70
        Top = 184
        Width = 79
        Height = 14
        Caption = 'CIS 101365,321 '
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
      end
      object Label8: TLabel
        Left = 71
        Top = 200
        Width = 43
        Height = 14
        Caption = 'InterNet '
        Font.Color = clYellow
        Font.Height = -11
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
      end
      object Panel2: TPanel
        Left = 5
        Top = 144
        Width = 172
        Height = 5
        Caption = 'Panel2'
        TabOrder = 0
      end
      object Panel3: TPanel
        Left = 24
        Top = 288
        Width = 137
        Height = 18
        Caption = 'Financial - Calculator'
        Font.Color = clBlack
        Font.Height = -11
        Font.Name = 'Times New Roman'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = Panel3Click
      end
    end
  end
end